В прошлом шаге я говорил, что для имен переменных нельзя использовать зарезервированные слова. Эти слова TP использует для себя. Практически с каждым из них Вы познакомитесь со временем. А пока вот список.
and else inline procedure type asm end interface program unit array external interrupt record until begin file label repeat uses case for mod set var const forward nil shl while constructor function not shr with destructor goto object string xor div if of then do implementation or to downto in packed
При попытке использовать зарезервированное слово в имени переменной Вы получите вот такое сообщение.